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LPCE DEC/X11 SYSTEM EXERCISER MODULE 
XLPCEO.P11 I2-DCT-78 11:57 



OOOOOO* 
000000* 




050114 042503 

000 
170416 



MACY11 30AU052) 12-0CT-78 16:50 PAGE 



?LPS-11 VC DFC/X11 EXERCISER MODULE 

IOMOD <LPCE >, 170416, 1,4,, ,2000,47 
MODULE 140000,LPCE , 1704l£'i, 4 / /?000, 47 
.TITLE LPCE d£c/X11 SYSTEM fixfirtCf §Eft nGdUL 



DDXCDM VERSION 
.LIST BIN 



.*******************«* 


Begin: 




modham: 


.ASCII /LPCE 
.BYTE OPEN 


XFLAG: 


addr: 


170416+0 


vector: 


1 + 


bri: 

BR2: 


.BYTE PRTY4+ 


.BYTE PRTY+0 


DVIDl! 


+ 1 


sri: 


OPEN 


SR2: 


OPEN 


SR3: 


OPEN 


SR4: 


OPEN 


•****************a*ftftft 


STAT: 


140000 


init: 


START 


spoint: 


MODSP 


pascnt: 





icont: 


2000 


icount: 
sofcnt: 








hrdcnt: 





sofpas: 





hrdpas: 





syscnt: 





rannum: 





config: 




RESl: 





RES2: 





svro: 


OPEN 


svri: 


OPEN 


SVR2: 
SVR3: 


OPEN 


OPEN 


SVR4: 


OPEN 


SVR5: 


OPEN 


SVR6: 


OPEN 


CSRA: 


OPEN 


SBADR: 




acsr: 


OPEN 


fefASADR: 




astat: 


OPEN 


errtyp: 




asb: 


OPEN 


awas: 


OPEN 


RSTRT: 


RESTRT 


wdto: 


OPEN 


wdfr: 


OPEN 


intr: 


OPEN 



*********** 



[*************** 



:******£* 



/ ;module name. 

;used to keep track of wbuff usage 

?1st device addr. 

;1st device vector. 
;1st rr level. 

;2nd br level. 

;device indicator 1. 

;switch register 1 

;switch register 2 

jSWITCH REGISTER 3 
**-.-* ?SfcITCH REGISTER 4 

;STATUS WORD. 

;MCDULE START ADDR. 

;MDDULE STACK POINTER. 

;PASS COUNTER. 

?# OF ITERATIONS PEP PAS5=2000 

JLCC TO COUNT ITERATIONS 

;L0C TO SAVE TOTAL SOFT ERRORS 

/LOC TO SAVE TOTAL HARD ERROPS 

;L0C TO SAVE SOFT ERRORS PER PASS 

;LOC TC SAVE HARD ERROPS PER PASS 

;tf OF SYS ERRORS ACCUMULATED 

jholds random # when rand macpc is called 
;reservsd for Monitor use 
reserved for monitor use 
jreserved for monitor use 
;loc to save ro. 

;LCC TO SAVE Rl. 

;loc to save p2. 

;l0c to save r3. 

hoc to save p4. 

;loc to save r5. 

;loc to save r6. 

;acdr of current csr. 

;addr of good data, or 

;conte»jts of csr. 

jaddr df rad data, or 

;status reg contents. 

;type of error 

jexpected data. 

;actual data. 

;rfstart address after end of pass 

;hcrds to memory per iteration 

;kords from memory per iteration 

?S OF interrupts per iteration 



LPCE DEC/X11 SYSTEM EXERCISER MODULE 
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230 
231 



111 

236 
237 
238 



000047 
000040 



MACY11 30A(1052) 12-0CT-78 16:50 PAGE 7 



47 

.REPT 

.NLIST 

.WORD 

.LIST 

.ENDR 



SPSIZ 




;MCDULE IDENTIFICATION NUMBER=47 
JMCDULE STACK STARTS HERE. 



******** 



LPCE DEC/X11 SYSTEM EXERCISER MODULE 
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;LPS-VC OPERATOR CHANGEABLE LOCATIONS 



888322: Milt 

000230" 170422 



mm- mm 



00033 



; COMMON LPS-VC DEVICE ADDRESSES 

VCSTATI 170416 ;SCOPE STATUS REGISTER 

VCXREG: 170420 ;SCOPE X AXIS REGISTER 

VCYREG: 170422 ;SCOPE Y AXIS REGISTER 

;COMMON LPS-VC DEVICE VECTOR 

;SCOPE INTERRUPT VECTOR 



vciv: 
vcivs: 



00236- 016767 177544 

00244* 016767 177536 

§0252* 062767 000002 

W-nm wit 

000274* 016767 177510 

000302* 016767 177502 177724 

888|infBH vmu tim 

000324- 012767 000022 177566 

000332* 012767 000006 •— --- 



320 
322 



;N0W SFT UP THE ADDRESS AND VECTOR DISPATCH LOG. 



START! MOV 
MOV 
ADD 
MOV 
ADD 
MOV 
MQV 
ADD 
MOV 
MOV 
MOV 



ADDR/VCSTAT 
ADDP, VCXREG 

2, VCXREG 
, DDR, VCYREG 

4, VCYREG 

ECTOR/VCIV 
VECTOR, VCIVS 
j2,VCIVS 

CSTAT/CSRA 
UB.,INTP 
J6/WDFR 



;LOAD DEVICE ADDRESS 

;18. INTERRUPTS/ITERATION 

?6 WDS FROM FEM 
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000340* 
000350* 



000360' 
000364* 

000366* 
000374* 
000402* 
000410' 

000412* 
000420* 
000426* 
000434* 

000436* 
000442* 

000444- 
000452- 
000460' 
000466' 

000470- 
000476- 
000504- 
000512* 

000514- 
000522* 
000530- 
000536' 

000540* 
000546- 
000554' 
000562' 
000564' 



005077 

8818?? 

005067 



177524 
177642 



002525 
002525 
002525 



005252 
005252 
005252 



177566 



002525 
002525 
002525 



005252 
005252 
005252 



2777 
1053 



m 



;LPS-VC LOGIC TEST 



002324 
002324 



022777 
001041 
000460 



005212 



177632 
177502 
177616 



H7606 
7456 
177572 



177 



177556 

'77424 

T7542 



H?i« 



_. MOO 
177516 



177502 
177354 
177466 



Iffli 881111 »■ 



7456 
-.7330 
177442 



restrt: clr 

CLR 
CLR 
CLR 

TST 

8NE 

MOV 

MOV 
CMP 

BNE 

MOV 
MQV 

CMP 
BNE 

TST 
BNE 

MOV 
MQV 
CMP 
BNE 

MOV 
MOV 
CMP 
BNE 

MOV 
MOV 
CMP 
BNE 

MOV 
MOV 

CMP 

BNE 



GVCSTAT 
SVCXREG 
SVCYREG 
ASTAT 

flVCXREG 

2525,flVCXREG 

2525/ASTAT 

2525,?VCXREG 

5252/gVCXREG 

5252,ASTAT 

5252,<?VCXREG 

GVCYREG 

82525, gVCYREG 
|2525, ASTAT 
»2525,gVCYREG 

«5252,(2VCYREG 
15252, ASTAT 
»5252/@VCYHEG 

#2324,flVCSTAT 

§2324,ASTAT 

$2324,@VCSTAT 

!5212,flVCSTAT 
5212, ASTAT 
5212,(aVCSTAT 



;CLEAR STATUS 

/CLEAR X 

JCLEAR Y 

?CLEAR POINTER 

;TEST X AXIS 
;BR IF SET 

;L0AU X 
;L0AD POINTER 
JTEST X 
JBR IF ERROR 

;lcd x 

?L0AD POINTER 

;test x 

;br if error 

;test y axis 
;bp ie error 

;load y 
?load pointer 

?TEST Y 

;BR IF ERROR 

;LO»D Y 
;LOAD POINTER 
;TEST Y 
;BR IF ERROR 

JLOAD STATUS 
;LOAD POINTER 
;TEST STATUS 
?BR IF ERROR 

;LOAD STATUS 
JLCAD POINTER 
;TEST STATUS 

;START DYNAMIC TEST 



LPCE D 
XLPCEO 
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mm- 

000602' 
000606' 

000614" 

000622* 

B88llf- 

000642* 
000646* 

000654* 

000662* 

000666* 

888%: 

000706* 
000714" 
000722" 



mm 

005077 
012767 

104405 

104410 

017767 
016767 

mm 

104405 
104410 



104405 
104410 



177434 
177426 
177416 
000025 

000000* 

000000* 

177376 
177370 

mm 

000000* 
000000* 



005077 
012777 

am 



1773; 

im\ 

oooo: 

oooooo* 

oooooo- 



177316 

000025 



000726* 
000732* 
000740* 
000746* 



000754* 104400 000000* 



177272 
000760* 

mm 



177306 
177276 

177272 

000000 



177246 
177236 



177232 
000000 



177206 
177176 

177172 

oooooo 



177272 

mm 



IS: 



2$J 



3$: 



MOV 
MOV 
CLR 
MOV 



(3VCXREG,ACSR 
VCXREG £ CSRA 
GVCSTAT 
125<ERRYYP 

•*******&* ************* 

HRDERS, BEGIN, NULL 
»***********&***#****** 

END$, BEGIN 



?l0ad contents 
;ldad address 
•ensure clear status 



PVCYREG/ACSR 

VCYREG,CSRA 

QVCSTAT 



MOV 
MOV 
CLR 
M 2¥^ * §25,ERRT¥P 

.*****#* *************** 

HRDERS,BEGIN,NULL 
•a********************* 

END$, BEGIN 



iS*i5I§*SE£I§ T EP BIT IN ERROR 
f************ ******* ******* ********** 



;LQAD CONTENTS 

;L0AD ADDRESS 

JENSURE CLEAR STATUS 

■BIT STUCK IN Y AXIS REGISTER 

r****************************** 

|Y AXIS REGISTER BIT IN 



**** 
**** 



MOV 
MOV 
CLR 
MOV 



faVCSTAT,ACSR 

VCSTAT,CSRA 

PVCSTAT 



;L0AD CONTENTS 
?LOAD ADDRESS 
; ENSURE CLEAR STATUS 
JBIT STUCK IN C/S REG 
**************** ************ 






?52i5!<g§S*5!t£iltL********S2I59H5IiI us BIT rN ERPDR 



ENDS, BEGIN 



PRIMER ROUTINE 

RIMES CLR 
MOV 
MOVB 
MOV 



BVCSTAT 

Rpsvogvciv 

BRl.gVCIVS 
#101,@VCSTAT 



EXITS, BEGIN 



^ENSURE CLEAR STATUS 

;SET UP LPSVC VECTOR 

?SET UP 

?START DISPLAY AND INTERRUPT ENABLE 

;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



m 

372 

m 

375 

m 

378 
379 

m 

382 
3 83 

m 

386 
3 87 
388 
389 
390 
391 
392 
393 
394 
395 
396 
397 
398 
399 
400 
401 
402 



000760* 000004 
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350 
351 
352 
353 
354 
355 
356 
357 
358 
359 
360 
361 
362 
363 
364 
3 65 
366 
367 
368 
36? 
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;lps vc displ 

^DISPLAY 



000766* 
000772* 
000774* 
001002* 
001006* 



105777 
100415 
017767 
005077 
012767 



oooooo* 

177232 

177224 

16 

)6 



000006 



001014* 104405 000000* 
001022* 104410 000000* 



177100 
177072 

OOOOOO 



001026* 
001034* 
001042* 
001050* 
001056* 
001064* 



012767 
012767 
012767 
012767 
012777 



002000 

005000 

000006 

001470* 

001204* 

000454 



000502 
000476 
000472 
000466 
177146 
000462 



001106* 
001114* 
001122- 
001130* 
001136* 
001144* 
001152* 
001156* 
001162* 
001164* 
001172* 
001200* 
001204* 



001204* 000004 



042777 
016777 
016777 

imv, 

012767 
117767 
005267 
106167 
100033 
016777 
016777 
104400 



001240* 
001246* 



105777 
100415 
017767 
005077 
012767 

104405 



000442 
000016 
000424 
000420 

\WA 

177771 

000404 
000376 
000374 

000346 
000342 
000000* 



000000* 

177006 

177000 
176772 
000006 

000000* 

OOOOOO* 



000446 
177116 
177112 
177106 
177074 
000412 
000406 
000404 



177034 
177030 



176654 
176646 
OOOOOO 



AY TEST 

"LPS-11" DN THE SCOPE 



PlRQSi 



BEGIN, 1$ 



QUEUE UP TC CONTINUE AT 1$ AND RTI 



TSTB 

BMI 

MOV 

CLR 

MOV 

HRDER 
* **** 

END$, 

MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



gVCSTAT 

LPSVCA 

@VCSTAT,ACSR 

SVCSTAT 

&6,ERRTYP 

**&********** 



;L0AD VALUE 



*********** 



BEGIN 



»2000,XPOS 

#5000,YPOS 

»6,CNtR 

fiTEXTjtPNTR 

ftCHAR3,£VCIV 

@PNTR,AAR2 



;PLOT CHARACTER 



CHAR5: 
CHARl: 



MOV 

3IC 

MOV 

MOV 

BIS 

MOV 

MOV 

MOVB 

INC 

ROLB 

BPL 

MOV 

MOV 

EXIT. 



¥POS,¥PT 
#16,§VCSTAT 
XP05,@VCXREG 
YPOS,flVCYREG 
«1O,0VCSTAT 
f-5/AARO 
#-7,AARl 
@AAR2,AAR3 
AAR2 
AAR3 
CHAR 13 

XPOS/pVCXREG 
YPOS,@VCYREG 
;, BEGIN 



;lqad x axis 
;load y axis 
jset up for 6 characters 

;TEXT LPS-11 

?load interrupt vector 
;load 



;init POINT 



;LOAD STATUS 
•MATRIX COUNT <ROW> 
•MATRIX COUNT <CULU*N> 
?GET CHARACTER 



;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



PIRQ$, 



BEGIN, 1$ 



1$: 



fsTB 
BMI 
MOV 
CLR 

MOV^ 

HRDERS 
****** 

END$,B 



GUEUE UP TO CONTINUE AT 1$ AND RTI 



PVCSTAT 

CIIAR13 

(JVCSTAT,ACSR ; 

@VCSTAT 

86/ERRTYP ; 

*&******a*******i 



LOAD VALUE 



SNC DISPLAY READY 
****************** 
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Ml 

016767 

tfflti 

mm 

ffln 
llllh 

042777 
012777 
104400 



05777 
00420 

005077 
012767 

104405 

104410 



000070 
000266 

000254 
000070 
000242 

000070 
000002 
000400 



000260 CHAR13: 



000244 
000234 



MSH 



001400 176662 



001400 

001364' 

000000' 



176652 
176652 



000000' 001372' 

176626 

176620 176472 

176612 176466 
176604 

000006 176460 

000000' 000000 

000000' 



CflARll: 
CHAR4: 

1$: 



ADD 

INC 

ONE 

MOV 

ADD 

INC 

BNE 

ADD 

ADD 

BIT 

BNE 

BIS 

BR 

BIC 

MOV 

EXITS/BEGIN 



§70,YPOS 

AARl 

CHAR2 

YPT,YPOS 

§70.XPOS 

AARO 

CHAR1 

S70,XPOS 
2,PNTR 
BIT8,gVCSTAT 



;next point 

;all points in the column 

;load next column 
;add scalce 
jdone all column 

;yes/ next character 

?test color 



pIT8!BIT9/@VCSTAT 
CHAR11 

#BIT8!BIT9,pVCSTAT 
:CHftR4,@VCIV 



;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



£lRQ$, BEGIN, 1$ ";~QUE!Ji"up~T0"c0NTTNUE~AT~l$"AND~PTl" 




;L0AD DEVICE ADDRESS 
;LOAD VALUE 



ENDS, BEGIN ; 
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435 
436 
437 
438 
' 39 
MO 

VA 
Ml 

445 
446 

til 

m 
hi 

53 
54 
55 

II 

58 

n 
%\ 

63 
64 

65 

n% 

70 

?J 
•?1 

II 

478 
479 
480 
481 



001440' 
001444' 
001446' 
001454' 



mm 



001470' 
001472' 
-14 ' 

f6' 
001500' 
001502' 

001504' 
001507' 
001511" 
001514' 
001516" 
001521' 
001523' 
001526' 
001530' 



005367 
001007 
042777 
104413 

000167 

000167 



001504' 
001511' 

mm- 

001530' 
001530' 



001536' 



001544* 
"*1546* 



540' 
542" 



550" 



001552* 



554' 
556* 
560' 
562' 



000002 
000000' 



177342 
177366 



177 
100 
177 
Oil 
046 
111 
000 
010 
000 
100 

001536" 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000001 



100 
100 
Oil 
006 

111 

062 
010 
000 
102 
000 



100 
Oil 

111 

010 
177 



DEC 
BNE 

ENDIT$,B 

JMP 

J MP 



CNTR 

2 k vcsTAT 

LPSVCA 
TXT1 



?SICNAL END OF ITERATION. 

;mcnitdr shall TFST END of pass 



2$: 

?TEXT FOR THE LPSVC SCOPE OPTION 
-— "LPS-11" 



;text 

TEXT 



L: 
P: 
s: 

DASH: 

Nl: 



xpos: 
ypos: 

CNTR: 

pntr: 

ypt: 

AARO: 

AARl: 

AAR2: 

AAR3*. 

TEMPI: 

TEMP2: 



L 
P 
S 

DASH 

Nl 

Nl 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.BYTE 

.EVEN 















177,100,100,100,100 

177,11,11,11,6 

46,111,111,111,62 

0,10,10,10,0 

0,102,177,100,0 
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MRO 001550R 381* 409* 

MRI 001552R 382* 405* 

AAR2 001554R 372* 383 

AAR3 001556R 383* 385* 

tsss 8ssi8ig im nr 
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474# 
475| 

477ft 
323* 



SF.Q 0013 



476« 



%r 



BITO 
Bifl 
BlTlO 
BITU 



BIT3 = 

BIT4 = 

BITS - 

BIt6 = 

BIT7 = 

BIT8 = 

BIT9 = 

BREAK$= 

BR1 

BR2 

BTODS = 

CDA?A$= 

CHAR 

CHAR1 

CHAR11 

CHAR13 

CHAR2 

CHAR20 

CHAR3 

CHAR4 

CHARS 

CfSTR 

CONFIG 

CSRA 

DASH 

DAfCK|= 

DAfER$= 

DVID1 

EHDIf$= 



000001 




238| 

223ft 
238f 
238$ 

m 



410 

418# 

395 

406 

437# 

390» 

421# 

437* 

265* 
462# 



321 
419 



404# 



471# 
315* 



328 
423 



330 
432 



337 
434 



339 

440 



308* 
348 



ill 4 4 15 



440 

321 330 339 

317* 326* 135* 

348 389 419 



365 
361* 



402 
398* 
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HRDERS- 


104405 


238 


1 319 


328 


337 


363 


400 


432 




HRDPAS 


000050R 
000036R 
000040R 


205 
















ICQHT 


200 
















ICOUHT 


201 
















IDNUM 
IHIT 


888381 


230 
197 
















IMTR 


000120R 
O015O4R 
000760R 
001026R 


229 


! 266* 














L 


449 


456S 














LPS¥C 


344 














LPSVCA 

MAP22$= 

MODNAM 


358 


442 












OOOOOOR 


238 
184 
198 


\ 














MODSP 


000224R 


236# 














MSGNS = 


104403 


238 


» 














MSGS$ = 
MSGS ~ 
HULL = 


000000 


III 


[ 














238 


f 319 


328 
464# 


337 


363 


400 


432 




Ml 


88i 5 o 3 o8 R 


453 


45 4 












OPEN = 


185 


191 


192 


193 


194 


211 


212 


213 






220 


222 


224 


225 


227 


228 


229 


2 3 8 # 


OTOA$ = 


104420 
001511R 


23 8# 














P 


450 


458# 














P&SCMf 


000034R 
000004 


199J 


I 

t 355 

* 372 














PIRQ$ = 


238 


392 


423 










P!ITR 


001544R 


370* 


412* 


472# 










POPSP = 


005726 


2381 
















POPSP2= 


022626 
000726R 


238 I 














PRIME 


311 


343# 
2383 














PRTY = 


000000 


189 














PRTYO = 


000000 
000040 


238j 
















PRTY1 = 


238 
















PRTY2 = 


000100 


238 
















PRTY3 = 


000140 


238 
















PRTY4 = 


000200 


188 


238# 














PRTY5 = 


000240 


238 
















PRTY6 = 


000300 
000340 


2381 














PRTY7 = 


238 
















PS 

PSM 


177776 
005746 


238 
238 














PUSH = 


238 
















PUSH2 = 


024646 


238 
















RAMD$ - 
RANNUM 


000054R 
000340R 


III 
















RESTRT 




271# 














RES1 


000056R 


209* 
210! 

W 


f 














RES2 


000060R 


• 














RSTRT 
S 


88KK8 


460# 














SBADR 


000102R 
000042R 


219* 
















SOFCNT 


2021 
238; 
















SOFERS= 
SOFPAS 


104406 
000046R 
















2041 
















SPOINT 


000032R 


1981 
















SPSIZ = 


000040 

000016R 

000020R 


1| 


231 














SRI 

SR2 


1?$! 
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